errorrn dw "Error al resta naturales(Underflow)" ;35

;resta de dos numeros natural
;   con control de carry (no importa el flag signo)
;   
;   param1: sumando1
;   param2: sumando2
;Deja en la punta del SP el resultado!!!

restaN proc near
    push bp
    mov bp,sp
    push ax
    
    mov ax,[bp+4]
    sub [bp+6],ax
    jnc resnok
    push offset errorrn
    push 35
    call writeSTR            
    jmp fin
resnok:
    pop ax
    pop bp
    ret 2        
    
restaN endp
;Fin rutina resta natural
